www.gusucode.com > 基于matlab编程蒙特卡罗仿真设计源码程序 > 基于matlab编程蒙特卡罗仿真设计源码程序/第五讲 蒙特卡洛方法的应用/liti31.m
function proguji=liti31(10,mm) frq=0; randnum=unidrnd(10,mm,3);proguji=0; for i=1:mm a=(randnum(i,1)+1)*(randnum(i,2)+1)*(randnum(i,3)+1) if mod(a,2)==1 frq=frq+1 end end; proguji=frq/mm